#include "Socket.hpp"
#include <sys/select.h>

class SelectServer
{
    const static int defaultfd = -1;
public:
    SelectServer(int port)
        :_listensock(std::make_unique<TcpSocket>())
    {
        _listensock->BuildTcpListenSocket(port);
        for(auto& e : _fd_arr) e = defaultfd;
        _fd_arr[0] = _listensock->Fd(); // 加入listensock描述符
    }

    void Start()
    {
        _isrunning = true;
        while(_isrunning)
        {
            //设置需要等待的文件描述符
            fd_set rfds;
            FD_ZERO(&rfds);
            int maxfd = -1;

            //将描述符集中的描述符加入rfds，并求出最大值
            for(int i = 0; i < 8; i++)
            {
                if(_fd_arr[i] != defaultfd)
                {
                    FD_SET(_fd_arr[i], &rfds);
                    if(maxfd < _fd_arr[i])
                    {
                        maxfd = _fd_arr[i];
                    }
                }
            }

            //设置超时时间
            timeval timeout = {2, 0}; // 2秒0微秒

            //等待
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, &timeout);
            switch(n)
            {
                case 0:
                    LOG(LogLevel::INFO) << "time out";
                break;
                case -1:
                    LOG(LogLevel::ERROR) << "error";
                break;
                default: // 等到了，做处理
                    HanderEvent(rfds);
                    LOG(LogLevel::DEBUG) << "select success";
                break;
            }
        }
        _isrunning = false;
    }

    //事件配发器
    void HanderEvent(const fd_set& rfds)
    {
        //此时等待就绪，两种情况：监听就绪/sockfd就绪
        //判断就绪的文件是哪一种，然后分类讨论
        for(int i = 0; i < 8; i++)
        {
            if(_fd_arr[i] != defaultfd && FD_ISSET(_fd_arr[i], &rfds))
            {
                //判断该描述符是监听还是socket
                if(_fd_arr[i] == _listensock->Fd())
                {
                    Accepter();
                }
                else
                {
                    Recver(_fd_arr[i], i);
                }
            }
        }
    }

    //链接管理器
    void Accepter()
    {
        //获取客户端IP和端口
        InetAddr client;
        int sockfd = _listensock->Accept(&client);
        if(sockfd != -1) // 将新的文件描述符加入描述符集
        {
            for(int i = 0; i < 8; i++)
            {
                if(_fd_arr[i] != defaultfd)
                {
                    _fd_arr[i] = sockfd;
                    break;
                }
                if(i == 7) // 超出最大限制
                {
                    LOG(LogLevel::WARING) << "fd full";
                    close(sockfd);
                }
            }
        }
    }

    //IO处理器
    void Recver(int sockfd, int pos)
    {
        char buff[1024];
        int n = recv(sockfd, buff, sizeof(buff) - 1, 0);
        if(n > 0) // 读到了
        {
            buff[n] = '\0';
            LOG(LogLevel::INFO) << "client say: " << buff;
        }
        else if(n == 0) // 客户端退出
        {
            LOG(LogLevel::INFO) << "客户端退出";

            //描述符集中去除对应sockfd
            _fd_arr[pos] = defaultfd;

            //关闭文件
            close(sockfd);
        }
        else // 读取错误
        {
            LOG(LogLevel::WARING) << "读取错误";
            
            //描述符集中去除对应sockfd
            _fd_arr[pos] = defaultfd;

            //关闭文件
            close(sockfd);
        }
    }

    void Stop()
    {
        _isrunning = false;
    }
private:
    std::unique_ptr<Socket> _listensock;
    bool _isrunning = false;
    int _fd_arr[8]; // select描述符集
};